home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 1.iso / DEMON / LANGUAGE / POTSRC.ARC / src / mod / CLib next >
Text File  |  1995-05-08  |  277b  |  14 lines
  1. MODULE CLib; (* SvdW, 8 May 1995 *)
  2.  
  3. (* Interface to _kernel_swi in the Shared C Library *)
  4.  
  5.  
  6. TYPE SwiRegs* = RECORD
  7.     r*: ARRAY 10 OF LONGINT;
  8.   END;
  9.  
  10. (* Call _kernel_swi via c._Clib *)
  11. PROCEDURE -KernelSwi*(swino: LONGINT; in: LONGINT; out: LONGINT): LONGINT 0;
  12.  
  13. END CLib.
  14.